with Matiere; use Matiere;
with Fonctionnalites; use Fonctionnalites;

package Diplome is

   Type Type_Diplome is record
      Objectif : Type_Note_Valeur;
      Matieres : Type_Matieres;
   end Record;

   procedure Enregistrer(Mon_Diplome : in out Type_Diplome);
   procedure Retirer(Mon_Diplome : in out Type_Diplome);
   procedure Ponderer(Mon_Diplome : in out Type_Diplome);
   procedure Viser(Mon_Diplome : in out Type_Diplome);
   procedure Lister(Mon_Diplome : in Type_Diplome);
   procedure Classer(Mon_Diplome : in out Type_Diplome);

   procedure Executer(Mon_Diplome : in out Type_Diplome; Fonctionnalite : Type_Fonctionnalites);

end Diplome;